use TestHelper;
use Map;
use MapLoader;
use MapTestHelper;

sub testParamsAreValid{
    my $loader = shift;
    
    print "Probando que los parametros sean validos\n";
    if(scalar($loader->invalidParams()) > 0){
	print "--->ERROR: Hay parametros invalidos\n";
	foreach my $invalid ($loader->invalidParams()){
	    print "---> >>$invalid\n";
	}
    }else{
	print "    OK\n";
    }
}

sub testParamsAreInvalid{
    my $loader = shift;
    
    print "Probando que los parametros NO sean validos\n";
    if(scalar($loader->invalidParams()) > 0){
	print "    OK\n";
	foreach my $invalid ($loader->invalidParams()){
	    print "    >>$invalid\n";
	}
    }else{
	print "--->ERROR: Los parametros son validos\n";
    }
}

1;
